home *** CD-ROM | disk | FTP | other *** search
- #!/usr/lib/scosh/utilbin/oash
- # (was /usr/lib/oa/utilbin/oash)
- # @(#) oaw.oash 1.0 92/09/08
- # 92/09/08 john h. dubois iii (john@armory.com)
-
- OALIB=${OALIB-"/usr/lib/oa"}
- PATH=$OALIB/utilbin:$PATH
-
- # run ourself thru oash
- eval oainit 2>/dev/null || (oash $0; kill $$)
- . `findfile shell_strs`
-
- TEMP=/tmp/fm1$$
-
- w > $TEMP
-
- [ -z "$LINES" ] && LINES=`tput lines`
-
- OAW1="What Users are Doing"
- wmopen 1 $LINES 79 0 0
- wmtitle "$OAW1"
- wmmessage -r "$USEARROW"
- scan -e"END" $TEMP
- rm -f $TEMP
- oadeinit
-